perm filename LOTS.F77[206,LSP]1 blob sn#319658 filedate 1977-12-04 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00003 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	.require "lsp.pub[206,clt]" source
C00003 00003	.hd206 Fall 1977
C00006 ENDMK
C⊗;
.require "lsp.pub[206,clt]" source;
.MACRO  hd206 (TERM) ⊂
.BEGIN    NOFILL  TURNON "←→"
←COMPUTER SCIENCE DEPARTMENT
←STANFORD UNIVERSITY
.SKIP  
CS206  ←COMPUTING WITH SYMBOLIC EXPRESSIONS  →TERM
.TURNOFF
.END ⊃
.
.itemmac
.PORTION MAINPORTION
.PAGE ← 1
.hd206 Fall 1977
.cb How to run LCOM0 and LCOM4 at LOTS
.begin nofill

#.  Read in the compiler by typing to LISP the following:
	(dskin lcom0 lsp cs206)	        ;LCOM4 works the same way

#.  To compile the functions in a file called FOO.LSP in your area say:
	(compl foo lsp)

#.  To load and test the compiled functions you must first load in the LAP assembler:
	(fasload lap fasl dsk (4 3))
	(fasload getmidasop fasl dsk (4 3))

#.  Now load the LAP file:
	(dskin foo lap dsk (m n))
.end
#. The arguments to dskin in the last step must contain the complete information 
about the file as the fasload's have changed the default.  
(m n) is your account number.    
.item ← 0
.skip 2
.cb  Using the ααβ-programs to play 2-dimensional TicTacToe.
.begin nofill

	(These programs are explained in the revised version of Chapter II.)

#. Read in the files GAME.LSP and TICTAC.LSP from the CS206 area:
	(dskin game lsp cs206)
	(dskin tictac lsp cs206)

#.  To initialize the world execute COMMENCE and NEWGAME:
	(commence)
	(newgame)

#.  Sample run:
	(valmin '(( 2 1)) -100 100)	;user
	3 				;LISP
	(newgame)			;reset game
	(NEW GAME) 
	(treemin '((2 1)) nil nil -100 100)
	(3 ((2 7 (4 9 (5 8 3)))) (2 (3 8 (5 7 (9 3))) (6 5 (8 7 (3 0))) (8 3 
	(7 4 (9 3))) (4 7 (5 9 (6 3))) (5 9 (7 4 (3 3))) (7 4 (9 5 (8 3))) 
	(9 5(8 7 (3 6 (4 0)))))) 
.end
#.  Note that NEWGAME must be executed whenever you want to reset the state of
the world to the initial state.  COMMENCE need only be executed at the very beginning.
(The numbers in the TicTacToe programs have been converted to decimal as that
is the default representation for LISP at LOTS.)